CAREWare 6 API Client Functions
Modified on Wed, 13 Mar 2024 11:48 by Kevin Ricciardo — Categorized as: Uncategorized
CAREWare support and documentation has been moved to a new location. For the most updated user guides and documentation for CAREWare click on the link below:
jPROG CAREWare Support Portal
This document outlines the available classes in the current version of the CAREWare 6 API. These classes all exist in the CWApi.vb file in the CW6ApiClient project of the sample application, which can be downloaded in the CW6APIDemo file
here
.
Classes:
ADAPEnrollment
This class provides methods for retrieving, adding, editing, and deleting ADAP Enrollment records.
Code Example for adding a record:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) Dim emptyDoc as Dictionary(Of String, ezjson.JSONValue) = CWApi.ADAPEnrollment.emptyCertification(sess) CWApi.Doc.SetRowValForColumn(emptyDoc, new ezjson.JSONValue(Date.Today), "adp_en_hs_date") CWApi.Doc.SetRowValForColumn(emptyDoc, new ezjson.JSONValue("01"), "adp_en_hs_adp_en_st_rfk")
Note: The following line assumes that there is a variable named clientPK that is set to a client's primary key
CWApi.ADAPEnrollment.addCertification(sess, clientPK, emptyDoc) CWApi.Session.Logout(sess)
AnnualScreening
This class provides methods for retrieving, adding, editing, and deleting Annual Screening records.
Code Example for adding a record:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName)
Note: The following line assumes that there is a variable named clientPK that is set to a client's primary key
CWApi.AnnualScreening.addScreening(sess, clientPK, Date.Today, "3AF46192-E55B-435E-9FF6-65BF3380C3A5", "319523D8-0376-4B02-A57E-B893700B8808", "")CWApi.Session.Logout(sess)
CaseNotes
This class provides methods for retrieving, adding, editing, and deleting Case Notes.
Code Example for adding a record:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName)
Note: The following line assumes that there is a variable named clientPK that is set to a client's primary key
CWApi.CaseNotes.addCaseNote(sess, clientPK, Date.Today, "Test Case Note", "") CWApi.Session.Logout(sess)
Client
This class provides methods for finding, retrieving, adding, editing, and deleting client records.
Code Example for adding a client and setting the client id:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) Dim clientPK as String = Guid.NewGuid.ToString() CWApi.Client.addClient(sess, clientPK, "Fake", "", "Client", "1", "8/29/2005") CWApi.Client.saveClientPersonalInfo(sess, clientPK, "", "Fake", "", "Client", "1", "8/29/2005", False, "New Client ID", "", "1") CWApi.Session.Logout(sess)
CommonStorage
This class provides methods for managing common storage values.
Code Example for getting and updating the minimum password length:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) Dim oldLength as Integer = CInt(CWApi.CommonStorage.getCommonStorageNumber(sess, "minimumPasswordLength") CWApi.CommonStorage.setCommonStorageNumber(sess, "minimumPasswordLength", 10) CWApi.Session.Logout(sess)
CustomFields
This class provides methods for managing custom fields and editing custom client tabs and custom subform records.
Code Example for adding a custom subform record to the default custom tab:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) Dim emptyDoc as Dictionary(Of String, ezjson.JSONValue) = CWApi.CustomFields.getEmptyCustomSubform(sess, "86C5CF2D-4D65-4E6D-9854-1CA13A11E926") CWApi.Doc.SetRowValForColumn(emptyDoc, new ezjson.JSONValue(Date.Today), "cst_sb_date")
Note: The following line assumes that there is a variable named clientPK that is set to a client's primary key
CWApi.CustomFields.addCustomSubformRecord(sess, clientPK, emptyDoc) CWApi.Session.Logout(sess)
CustReport
This class provides methods for managing and running custom reports.
Code Example for running a custom report:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) getAReportKey is not a real function Dim ReportPK As String = getAReportKey() Dim reportStream as CWApi.CWFileStream = CWApi.CustReport.GerReportCSVStream (sess, ReportPK, Nothing, Date.Today()) reportStream.saveToFile ("C:\Reports\MyReport.csv") CWApi.Session.Logout(sess)
CwFileStream
This class provides methods for downloading report outputs or uploading and downloading attachments.
Code Example for uploading and downloading an attachment:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) getAContentType is a pseudo function. Dim contentType as String = getAContentType() gettAttachmentList is a pseudo function. Dim attLsPK as string= getAttachmentList() CW6HttpClient.CWApi.CustomFields.addAttachment(sess, clientPK, attLsPK, contentType, "C:\Attachments\ProofOfIncome.pdf", "") pickAnAttachment is a pseudo function Dim attachmentPK as string = pickAnAttachment() Dim cwfs As Cw6HttpClient.CwApi.CwFileStream = Cw6HttpClient.CwApi.CustomFields.getAttachmentFileStream (sessionVariables.session Info,attachmentPK) Dim tempFolder As String = IO.Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "temp") If Not IO.Directory.Exists(tempFolder) Then IO.Directory.CreateDirector (tempFolder) End If Dim fs As IO.FileStream Try DIm fileName as string = "ProofOfIncome.pdf", fs = New IO.FileStream(IO.Path.Combine(tempFolder, fileName), IO.FileMode.Create) cwfs.CopyTo(fs) Catch ex As Exception Throw ex Finally cwfs.Flush() cwfs.Close() If Not IsNothing(fs) Then fs.Flush() fs.Close() End If End Try Open the attachment Process.Start(IO.Path.Combine(tempFolder, fileName)) CWApi.Session.Logout(sess)
Eligibility
This class provides methods for viewing, adding, editing, and deleting eligibility records.
Code Example for adding an eligibility record:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) pickAClient is a pseudo function Dim clientPK as String = pickAClient() Dim EligibilityData As Dictionary(Of String, ezjson.JSONValue) = Cw6HttpClient.CwApi.Eligibility.getEmptyEligibilityRecord(sessionVariables.sessionInfo) CWApi.Doc.SetRowValForColumn(emptyDoc, new ezjson.JSONValue(Date.Today), "EligibilityDate") CWApi.Doc.SetRowValForColumn(emptyDoc, new ezjson.JSONValue("1"), "elg_yes_no_rfk") CWApi.Doc.SetRowValForColumn(emptyDoc, new ezjson.JSONValue("FFFFFFFF-0000-0000-0000-000000000002"), "elg_fnd_sr_fk") Cw6HttpClient.CwApi.Eligibility.addEligibilityRecord(sess, ClientPK, EligibilityData) CWApi.Session.Logout(sess)
InsuranceAssessment
This class provides methods for viewing, adding, editing, and deleting insurance assessment records.
Code Example for adding a record:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) pickAClient is a pseudo function Dim clientPK as String = pickAClient() Adds a Medicaid insurance record Cw6HttpClient.CwApi.InsuranceAssessment.addInsuranceAssessment(sess, ClientPK, Date.Today, "3", False, False, False, False, False, False, True, False, False, False, False, "", False ) CWApi.Session.Logout(sess)
Lab
This class provides methods for viewing, adding, editing, and deleting lab records.
Code Example for adding a record:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) pickAClient is a pseudo function Dim clientPK as String = pickAClient() Adds a CD4 Count Cw6HttpClient.CwApi.Lab.addLab(sess, ClientPK, Date.Today, "FFFFFFFF-0000-0000-0000-000000000001", "=", 200,"") CWApi.Session.Logout(sess)
User
This class provides methods for managing user accounts.
Code Example for changing the current user's password:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) Cw6HttpClient.CwApi.User.ChangeMyPassword(sess,"N3WPa$$w0rd") CWApi.Session.Logout(sess)
Service
This class provides methods for viewing, adding, editing, and deleting service records.
Code Example for adding a record:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) pickAClient is a pseudo function Dim clientPK as String = pickAClient() pickAServiceType is a pseudo function Dim serviceType as String = pickAServiceType() pickAContract is a pseudo function Dim contract as String = pickAContract() Adds a CD4 Count Cw6HttpClient.CwApi.Service.addService(sess,ClientPK,Date.Today, serviceType, 1, 5, 5, contract) CWApi.Session.Logout(sess)
PovertyLevel
This class provides methods for viewing, adding, editing, and deleting poverty level records.
Code Example for adding a record:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) pickAClient is a pseudo function Dim clientPK as String = pickAClient() Cw6HttpClient.CwApi.Service.addService (sess, ClientPK, Date.Today, 25000, 1, 25000) CWApi.Session.Logout(sess)
Referral
This class provides methods for viewing, adding, editing, and deleting referral records.
Code Example for adding a record:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) pickAClient is a pseudo function Dim clientPK as String = pickAClient() pickAProvider is a pseudo function Dim referToProvider as String = pickAProvider() pickAReferralClass is a pseudo function Dim referralClass As String = pickAReferralClass() Cw6HttpClient.CwApi.Service.addReferral (sess,ClientPK, Date.Today, "01,"1', referToProvider, "", "", "001", date.MinValue, "", "", False, referralClass) CWApi.Session.Logout(sess)
UserMessages
This class provides methods for sending user messages.
Code Example for sending a message:
Dim useTLS as Boolean = False Dim serverName as String = "localhost" Dim providerName as String = "default" Dim sess as New CWApiSession(useTLS, serverName) CWApi.Session.Login(sess, "cwtemp", "TEMPCW100", providerName) pickAClient is a pseudo function Dim clientPK as String = pickAClient() pickAUser is a pseudo function Dim sendToUser as String = pickAUser() Cw6HttpClient.CwApi.Service.addReferral(sess,ClientPK, "Test Message", sendToUser) CWApi.Session.Logout(sess)
To download these instructions click
here
.
Back to
CAREWare 6 API Introduction